object Idx: TIdx
  OldCreateOrder = False
  Left = 180
  Top = 154
  Height = 531
  Width = 423
  object OldIdx: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$INDICES where RDB$SYSTEM_FLAG IS NULL'#13#10'and RDB' +
      '$INDEX_NAME=:INAME'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'INAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.OldDB
    Left = 24
    Top = 32
  end
  object NewIdx: TSQLDataSet
    GetMetadata = False
    CommandText = 'select * from RDB$INDICES where RDB$SYSTEM_FLAG IS NULL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.NewDB
    Left = 136
    Top = 32
  end
  object OldIdxDef: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$INDEX_SEGMENTS where RDB$INDEX_NAME=:IDXNAME o' +
      'rder by RDB$FIELD_POSITION'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'IDXNAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.OldDB
    Left = 24
    Top = 112
  end
  object NewIdxDef: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$INDEX_SEGMENTS where RDB$INDEX_NAME=:IDXNAME o' +
      'rder by RDB$FIELD_POSITION'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'IDXNAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.NewDB
    Left = 136
    Top = 112
  end
  object OldPrim: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$RELATION_CONSTRAINTS where RDB$CONSTRAINT_TYPE' +
      '='#39'PRIMARY KEY'#39' and'#13#10'RDB$RELATION_NAME=:PNAME'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'PNAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.OldDB
    Left = 24
    Top = 200
  end
  object OldCon: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$RELATION_CONSTRAINTS where RDB$CONSTRAINT_TYPE' +
      '='#39'FOREIGN KEY'#39' and'#13#10'RDB$CONSTRAINT_NAME=:CNAME'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'CNAME'
        ParamType = ptInput
      end>
    SQLConnection = DM.OldDB
    Left = 24
    Top = 280
  end
  object OldConRef: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$REF_CONSTRAINTS where RDB$CONSTRAINT_NAME=:CON' +
      'NAME'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'CONNAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.OldDB
    Left = 24
    Top = 352
  end
  object NewPrim: TSQLDataSet
    GetMetadata = False
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.NewDB
    Left = 136
    Top = 200
  end
  object NewCon: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$RELATION_CONSTRAINTS where RDB$CONSTRAINT_TYPE' +
      '='#39'FOREIGN KEY'#39
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.NewDB
    Left = 136
    Top = 280
  end
  object NewConRef: TSQLDataSet
    GetMetadata = False
    CommandText = 
      'select * from RDB$REF_CONSTRAINTS where RDB$CONSTRAINT_NAME=:CON' +
      'NAME'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftString
        Name = 'CONNAME'
        ParamType = ptInput
        Value = 'XXX'
      end>
    SQLConnection = DM.NewDB
    Left = 136
    Top = 352
  end
end
